home *** CD-ROM | disk | FTP | other *** search
- if exist pcbstuff.kbd del pcbstuff.kbd
- l:\mailfile\filelist l:\mailfile\flatfile.dat >pcbdoor.txt
- if errorlevel 2 goto args
- if errorlevel 1 pcboard
- copy l:\mailfile\filelist.hdr+pcbdoor.txt pcbdoor2.txt >NUL
- del pcbdoor.txt >NUL
- ren pcbdoor2.txt pcbdoor.txt >NUL
- goto end
- :pcboard
- echo Could not open PCBOARD.SYS>pcbdoor.txt
- got end
- :args
- echo Not enough arguments!>pcbdoor.txt
- :end
- l:\pcb\board